CAASidereal_MeanGreenwichSiderealTime <-
function(JD){
.Call("CAASidereal_MeanGreenwichSiderealTime", JD)
}
